(gnus-score-after-write-file-function): Fix :type.

diff --git a/lisp/gnus/gnus-score.el b/lisp/gnus/gnus-score.el
index 213178320abbc39b16473b35d03a6665e000ae7a..0cfc079a214e5376addfb0d1a20310a8b1e565bd 100644 (file)
--- a/lisp/gnus/gnus-score.el
+++ b/lisp/gnus/gnus-score.el
@@ -384,7 +384,7 @@ If nil, the user will be asked for a duration."
 (defcustom gnus-score-after-write-file-function nil
   "Function called with the name of the score file just written to disk."
   :group 'gnus-score-files
-  :type 'function)
+  :type '(choice (const nil) function))
 
 (defcustom gnus-score-thread-simplify nil
   "If non-nil, subjects will simplified as in threading."